home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / A-B / AnimationStak.cpt / DragTracer / card_4482.txt < prev    next >
Text File  |  1989-02-26  |  12KB  |  412 lines
  1. -- card: 4482 from stack: in
  2. -- bmap block id: 5368
  3. -- flags: 0000
  4. -- background id: 2775
  5. -- name: example
  6. ----- HyperTalk script -----
  7. on closecard
  8.   hide card field "Narration"
  9. end closecard
  10.  
  11.  
  12. -- part 1 (button)
  13. -- low flags: 00
  14. -- high flags: A004
  15. -- rect: left=258 top=36 right=61 bottom=445
  16. -- title width / last selected line: 0
  17. -- icon id / first selected line: 0 / 0
  18. -- text alignment: 1
  19. -- font id: 0
  20. -- text size: 12
  21. -- style flags: 0
  22. -- line height: 16
  23. -- part name: Show me some examples...
  24. ----- HyperTalk script -----
  25. on mouseUp
  26.   choose brush tool
  27.   set pattern to 12
  28.   set dragSpeed to 0
  29.   show card field "Narration"
  30.   put "This is the path of the instructional demo." into item 1 of card field "narration"
  31.   repeat with num=1 to the number of lines of card field "Invisible data"
  32.     put line num of card field "Invisible data" into it
  33.     if it is empty then exit repeat
  34.     do it
  35.   end repeat
  36.   doMenu revert
  37.   put "Here's one example of what might be done." into item 1 of card field "narration"
  38.   Drag from  117,197  to  118,196
  39.   Drag from  118,196  to  122,193
  40.   Drag from  122,193  to  135,185
  41.   Drag from  135,185  to  144,174
  42.   Drag from  144,174  to  155,159
  43.   Drag from  155,159  to  165,142
  44.   Drag from  165,142  to  166,125
  45.   Drag from  166,125  to  165,120
  46.   Drag from  165,120  to  158,126
  47.   Drag from  158,126  to  153,142
  48.   Drag from  153,142  to  151,161
  49.   Drag from  151,161  to  147,179
  50.   Drag from  147,179  to  143,195
  51.   Drag from  143,195  to  139,212
  52.   Drag from  139,212  to  136,231
  53.   Drag from  136,231  to  134,233
  54.   Drag from  134,233  to  140,217
  55.   Drag from  140,217  to  146,201
  56.   Drag from  146,201  to  157,188
  57.   Drag from  157,188  to  171,189
  58.   Drag from  171,189  to  174,203
  59.   Drag from  174,203  to  173,215
  60.   Drag from  173,215  to  173,228
  61.   Drag from  173,228  to  180,233
  62.   Drag from  180,233  to  193,229
  63.   Drag from  193,229  to  209,217
  64.   Drag from  209,217  to  216,205
  65.   Drag from  216,205  to  219,189
  66.   Drag from  219,189  to  217,185
  67.   Drag from  217,185  to  208,193
  68.   Drag from  208,193  to  205,205
  69.   Drag from  205,205  to  204,217
  70.   Drag from  204,217  to  207,232
  71.   Drag from  207,232  to  217,235
  72.   Drag from  217,235  to  233,232
  73.   Drag from  233,232  to  245,220
  74.   Drag from  245,220  to  258,206
  75.   Drag from  258,206  to  269,186
  76.   Drag from  269,186  to  278,165
  77.   Drag from  278,165  to  282,148
  78.   Drag from  282,148  to  284,133
  79.   Drag from  284,133  to  282,129
  80.   Drag from  282,129  to  279,135
  81.   Drag from  279,135  to  275,150
  82.   Drag from  275,150  to  272,168
  83.   Drag from  272,168  to  267,184
  84.   Drag from  267,184  to  264,202
  85.   Drag from  264,202  to  264,217
  86.   Drag from  264,217  to  272,228
  87.   Drag from  272,228  to  279,228
  88.   Drag from  279,228  to  291,224
  89.   Drag from  291,224  to  303,214
  90.   Drag from  303,214  to  313,197
  91.   Drag from  313,197  to  321,176
  92.   Drag from  321,176  to  327,155
  93.   Drag from  327,155  to  328,139
  94.   Drag from  328,139  to  325,133
  95.   Drag from  325,133  to  322,133
  96.   Drag from  322,133  to  317,144
  97.   Drag from  317,144  to  316,159
  98.   Drag from  316,159  to  315,181
  99.   Drag from  315,181  to  314,201
  100.   Drag from  314,201  to  314,216
  101.   Drag from  314,216  to  316,225
  102.   Drag from  316,225  to  328,230
  103.   Drag from  328,230  to  339,218
  104.   Drag from  339,218  to  349,202
  105.   Drag from  349,202  to  356,191
  106.   Drag from  356,191  to  366,190
  107.   Drag from  366,190  to  370,190
  108.   Drag from  370,190  to  365,189
  109.   Drag from  365,189  to  355,195
  110.   Drag from  355,195  to  351,210
  111.   Drag from  351,210  to  354,224
  112.   Drag from  354,224  to  360,232
  113.   Drag from  360,232  to  374,235
  114.   Drag from  374,235  to  381,228
  115.   Drag from  381,228  to  385,216
  116.   Drag from  385,216  to  384,204
  117.   Drag from  384,204  to  377,194
  118.   Drag from  377,194  to  372,195
  119.   Drag from  372,195  to  370,203
  120.   Drag from  370,203  to  380,208
  121.   Drag from  380,208  to  390,204
  122.   Drag from  390,204  to  397,197
  123.   Drag from  397,197  to  400,189
  124.   Drag from  400,189  to  401,187
  125.   speak "Hello."
  126.   doMenu revert
  127.   choose round rect tool
  128.   set centered to false
  129.   set pattern to 1
  130.   set filled to false
  131.   set multiple to true
  132.   set dragSpeed to 500
  133.   put "another" into second word of line 1 of item 1 of card field "narration"
  134.   Drag from  76,105  to  438,143
  135.   Drag from  438,143  to  18,239
  136.   Drag from  18,239  to  445,256
  137.   doMenu revert
  138.   choose regular polygon tool
  139.   set polysides to 5
  140.   set centered to true
  141.   put "And still another example." into item 1 of card field "narration"
  142.   Drag from  255,154  to  255,151
  143.   Drag from  255,151  to  246,134
  144.   Drag from  246,134  to  235,133
  145.   Drag from  235,133  to  222,137
  146.   Drag from  222,137  to  215,146
  147.   Drag from  215,146  to  211,160
  148.   Drag from  211,160  to  211,178
  149.   Drag from  211,178  to  214,195
  150.   Drag from  214,195  to  225,210
  151.   Drag from  225,210  to  239,223
  152.   Drag from  239,223  to  271,229
  153.   Drag from  271,229  to  292,228
  154.   Drag from  292,228  to  319,221
  155.   Drag from  319,221  to  342,213
  156.   doMenu revert
  157.   set filled to true
  158.   set dragSpeed to 0
  159.   put 10 into count
  160.   put "This is the last example.  Add some of your own." into item 1 of card field "narration"
  161.   repeat 3 times
  162.     choose oval tool
  163.     set centered to false
  164.     set multiple to false
  165.     set pattern to count
  166.     Drag from  310,220 to  380,170
  167.     choose lasso tool
  168.     click at 350,200 with commandKey
  169.     Drag from  361,201  to  361,200
  170.     Drag from  361,200  to  361,185
  171.     Drag from  361,185  to  357,166
  172.     Drag from  357,166  to  346,141
  173.     Drag from  346,141  to  331,123
  174.     Drag from  331,123  to  313,108
  175.     Drag from  313,108  to  300,106
  176.     Drag from  300,106  to  283,110
  177.     Drag from  283,110  to  268,119
  178.     Drag from  268,119  to  259,134
  179.     Drag from  259,134  to  254,154
  180.     Drag from  254,154  to  251,175
  181.     Drag from  251,175  to  247,190
  182.     Drag from  247,190  to  247,196
  183.     Drag from  247,196  to  245,187
  184.     Drag from  245,187  to  238,168
  185.     Drag from  238,168  to  228,153
  186.     Drag from  228,153  to  216,142
  187.     Drag from  216,142  to  210,141
  188.     Drag from  210,141  to  201,144
  189.     Drag from  201,144  to  197,151
  190.     Drag from  197,151  to  195,160
  191.     Drag from  195,160  to  194,173
  192.     Drag from  194,173  to  193,185
  193.     Drag from  193,185  to  193,197
  194.     Drag from  193,197  to  193,201
  195.     Drag from  193,201  to  194,197
  196.     Drag from  194,197  to  204,181
  197.     Drag from  204,181  to  219,170
  198.     Drag from  219,170  to  238,165
  199.     Drag from  238,165  to  259,165
  200.     Drag from  259,165  to  288,166
  201.     Drag from  288,166  to  306,172
  202.     Drag from  306,172  to  315,181
  203.     Drag from  315,181  to  330,196
  204.     Drag from  330,196  to  331,200
  205.     Drag from  331,200  to  331,203
  206.     Drag from  331,203  to  332,203
  207.     subtract 1 from count
  208.   end repeat
  209.   doMenu revert
  210.   choose browse tool
  211.   hide card field "Narration"
  212. end mouseUp
  213.  
  214.  
  215.  
  216. -- part 4 (button)
  217. -- low flags: 00
  218. -- high flags: 0000
  219. -- rect: left=449 top=296 right=321 bottom=477
  220. -- title width / last selected line: 0
  221. -- icon id / first selected line: 1012 / 1012
  222. -- text alignment: 1
  223. -- font id: 0
  224. -- text size: 12
  225. -- style flags: 0
  226. -- line height: 16
  227. -- part name: 
  228. ----- HyperTalk script -----
  229. on mouseUp
  230.   pop card
  231. end mouseUp
  232.  
  233.  
  234.  
  235. -- part 6 (button)
  236. -- low flags: 00
  237. -- high flags: 0000
  238. -- rect: left=228 top=298 right=321 bottom=254
  239. -- title width / last selected line: 0
  240. -- icon id / first selected line: 1014 / 1014
  241. -- text alignment: 1
  242. -- font id: 0
  243. -- text size: 12
  244. -- style flags: 0
  245. -- line height: 16
  246. -- part name: Prev
  247. ----- HyperTalk script -----
  248. on mouseUp
  249.   go to prev card
  250. end mouseUp
  251.  
  252.  
  253.  
  254. -- part 7 (field)
  255. -- low flags: 80
  256. -- high flags: 2004
  257. -- rect: left=84 top=268 right=291 bottom=427
  258. -- title width / last selected line: 0
  259. -- icon id / first selected line: 0 / 0
  260. -- text alignment: 1
  261. -- font id: 3
  262. -- text size: 12
  263. -- style flags: 8448
  264. -- line height: 16
  265. -- part name: narration
  266.  
  267.  
  268. -- part 9 (button)
  269. -- low flags: 00
  270. -- high flags: 2000
  271. -- rect: left=463 top=61 right=292 bottom=488
  272. -- title width / last selected line: 0
  273. -- icon id / first selected line: 0 / 0
  274. -- text alignment: 1
  275. -- font id: 0
  276. -- text size: 12
  277. -- style flags: 0
  278. -- line height: 16
  279. -- part name: 
  280. ----- HyperTalk script -----
  281. on mouseUp
  282.   go to first card
  283. end mouseUp
  284.  
  285.  
  286.  
  287. -- part 12 (button)
  288. -- low flags: 00
  289. -- high flags: A004
  290. -- rect: left=47 top=36 right=61 bottom=222
  291. -- title width / last selected line: 0
  292. -- icon id / first selected line: 0 / 0
  293. -- text alignment: 1
  294. -- font id: 0
  295. -- text size: 12
  296. -- style flags: 0
  297. -- line height: 16
  298. -- part name: Show me how it works...
  299. ----- HyperTalk script -----
  300. on mouseUp
  301.   put return into card field "Visible data"
  302.   show card field "Visible data"
  303.   show card field "'little help"
  304.   choose brush tool
  305.   set the pattern to 12
  306.   repeat with num=1 to the number of lines in card field "Invisible data"
  307.     put word 3 of line num of card field "Invisible data" into x
  308.     click at x
  309.     put line num of card field "Invisible data" into line num of card field "Visible data"
  310.   end repeat
  311.   doMenu revert
  312.   choose browse tool
  313.   put return into card field "Visible data"
  314.   hide card field "Visible data"
  315.   hide card field "'little help"
  316. end mouseUp
  317.  
  318.  
  319. -- part 13 (field)
  320. -- low flags: 80
  321. -- high flags: 0007
  322. -- rect: left=224 top=69 right=224 bottom=460
  323. -- title width / last selected line: 0
  324. -- icon id / first selected line: 0 / 0
  325. -- text alignment: 0
  326. -- font id: 3
  327. -- text size: 12
  328. -- style flags: 0
  329. -- line height: 16
  330. -- part name: Invisible data
  331.  
  332.  
  333. -- part 14 (field)
  334. -- low flags: 00
  335. -- high flags: 0007
  336. -- rect: left=226 top=76 right=288 bottom=460
  337. -- title width / last selected line: 0
  338. -- icon id / first selected line: 0 / 0
  339. -- text alignment: 0
  340. -- font id: 3
  341. -- text size: 12
  342. -- style flags: 0
  343. -- line height: 16
  344. -- part name: Visible data
  345.  
  346.  
  347. -- part 15 (field)
  348. -- low flags: 01
  349. -- high flags: 0002
  350. -- rect: left=21 top=234 right=288 bottom=221
  351. -- title width / last selected line: 0
  352. -- icon id / first selected line: 0 / 0
  353. -- text alignment: 0
  354. -- font id: 3
  355. -- text size: 12
  356. -- style flags: 0
  357. -- line height: 16
  358. -- part name: 'little help
  359.  
  360.  
  361. -- part contents for card part 7
  362. ----- text -----
  363. This is the last example.  Add some of your own.
  364.  
  365. -- part contents for card part 13
  366. ----- text -----
  367. Drag from  142,120  to  138,126
  368. Drag from  138,126  to  135,134
  369. Drag from  135,134  to  134,138
  370. Drag from  134,138  to  132,134
  371. Drag from  132,134  to  124,129
  372. Drag from  124,129  to  117,128
  373. Drag from  117,128  to  108,130
  374. Drag from  108,130  to  100,135
  375. Drag from  100,135  to  92,147
  376. Drag from  92,147  to  86,161
  377. Drag from  86,161  to  85,176
  378. Drag from  85,176  to  89,191
  379. Drag from  89,191  to  99,202
  380. Drag from  99,202  to  109,209
  381. Drag from  109,209  to  119,210
  382. Drag from  119,210  to  122,208
  383. Drag from  122,208  to  128,203
  384. Drag from  128,203  to  135,203
  385. Drag from  135,203  to  143,205
  386. Drag from  143,205  to  152,209
  387. Drag from  152,209  to  162,210
  388. Drag from  162,210  to  171,208
  389. Drag from  171,208  to  177,201
  390. Drag from  177,201  to  181,190
  391. Drag from  181,190  to  184,179
  392. Drag from  184,179  to  184,177
  393. Drag from  184,177  to  174,172
  394. Drag from  174,172  to  169,161
  395. Drag from  169,161  to  170,148
  396. Drag from  170,148  to  174,142
  397. Drag from  174,142  to  178,141
  398. Drag from  178,141  to  180,141
  399. Drag from  180,141  to  173,133
  400. Drag from  173,133  to  162,130
  401. Drag from  162,130  to  152,130
  402. Drag from  152,130  to  146,132
  403.  
  404.  
  405. -- part contents for card part 14
  406. ----- text -----
  407.  
  408.  
  409.  
  410. -- part contents for card part 15
  411. ----- text -----
  412.    As you trace a path, like the one above, the coordinates are stored in a field like this.  -->